Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

pytanie z funckji


Rekomendowane odpowiedzi

Opublikowano

Jak zrobie sobie gui przykładowe z koda tak?

 

I zrobie sobie button

 

To jak potem zrobic zeby np ten button cos robił :)

 

Pod całem kodem mam pisac

 

Func i button i co ma robic czy pierw co ma robic i na koncu button czy wgl jakos inaczej? :)

 

Za odp. beda like

Opublikowano

Przykladowy kod :

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("Form1", 117, 44, 523, 296)
$Button1 = GUICtrlCreateButton("Button1", 8, 8, 75, 25)
GUISetState(@SW_SHOW)

While 1
	Sleep(100)
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			jakasfunkcja()
	EndSwitch
WEnd

Func jakasfunkcja()
	MsgBox(64,"info","lol")
EndFunc

 

Opublikowano

Ale słuchaj przykładowo tu tu jest tylko gui z buttonem tak ?

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 0, 176, 161, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd

 

 

 

 

I jak zrobic zeby np ten button nie wiem cos zrobił :) , przykładowo do bota

Opublikowano


#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 623, 442, 192, 124)

$Button1 = GUICtrlCreateButton("Start", 0, 176, 161, 33)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

MsgBox(64, '', 'NIE OGARNIAM PODSTAW, MUSZĘ ZACZĄĆ CZYTAĆ TUTY')

EndSwitch

WEnd

 

Opublikowano

 

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 0, 176, 161, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            MsgBox(64, '', 'NIE OGARNIAM PODSTAW, MUSZĘ ZACZĄĆ CZYTAĆ TUTY')
    EndSwitch
WEnd
 

 

 

O juz ogarnołem :)

 

Like dostaniesz , bo juz wiem ze funkcje sie daje np

 

Case $Button1 :)

Opublikowano

Dajesz Case $przycisk i pod nim co ma zrobić/odwołanie do funkcji. Przy czym $przycisk - nazwa buttona w gui.

1387536187-U112334.png

Jeśli Ci pomogłem mógłbyś wynagrodzić lajkiem :)

Opublikowano

Dajesz Case $przycisk i pod nim co ma zrobić/odwołanie do funkcji. Przy czym $przycisk - nazwa buttona w gui.

nazwa zmiennej która trzyma handle tego obiektu, ponieważ nazwa buttona może być inna

Opublikowano

Dobra mam juz takie cos tak ?

 

Kod:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 168, 32, 241, 21)
$Button1 = GUICtrlCreateButton("Start", 168, 56, 89, 33)
$Button2 = GUICtrlCreateButton("Stop", 312, 56, 97, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
AdlibRegister("odswiez",1000)
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd
Func odswiez()
	$kod = ''
	For $a = 0 To 5
		For $x = 0 To 4
			$kod &= Random(0, 9, 1)
		Next
		$kod &= '-'
	Next
	$kod = StringTrimRight($kod,1)
	GUICtrlSetData($Input1, $kod)
EndFunc   ;==>odswiez

 

 

Ale to sie samo włacza .. ,a ja bym chcial zeby za pomocą buttona start i stop sie właczało i wyłaczalo

 

 

A tam nie ma komendu takiej zeby to sie rozpoczelo ;d

 

( jestem narazie beginier wiec prosze o wyrozumiałosc )

 

PS.Myslalem nad funkcją Step .. bo ja czytam po tutach to robi jako za

 

<start> i <stop>

Opublikowano


#include <ButtonConstants.au3>

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 623, 442, 192, 124)

$Input1 = GUICtrlCreateInput("Input1", 168, 32, 241, 21)

$Button1 = GUICtrlCreateButton("Start", 168, 56, 89, 33)

$Button2 = GUICtrlCreateButton("Stop", 312, 56, 97, 33)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

case $button1

msgbox(0,"","NADAL NIE PRZECZYTALEM TUTA")

AdlibRegister("odswiez",1000)

case $button2

AdlibUnRegister ("odswiez")

 

EndSwitch

WEnd

 

Func odswiez()

$kod = ''

For $a = 0 To 5

For $x = 0 To 4

$kod &= Random(0, 9, 1)

Next

$kod &= '-'

Next

$kod = StringTrimRight($kod,1)

GUICtrlSetData($Input1, $kod)

EndFunc ;==>odswiez

Opublikowano

 

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 168, 32, 241, 21)
$Button1 = GUICtrlCreateButton("Start", 168, 56, 89, 33)
$Button2 = GUICtrlCreateButton("Stop", 312, 56, 97, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
case $button1
msgbox(0,"","NADAL NIE PRZECZYTALEM TUTA")
AdlibRegister("odswiez",1000)
case $button2
AdlibUnRegister ("odswiez")

EndSwitch
WEnd

Func odswiez()
$kod = ''
For $a = 0 To 5
  For $x = 0 To 4
   $kod &= Random(0, 9, 1)
  Next
  $kod &= '-'
Next
$kod = StringTrimRight($kod,1)
GUICtrlSetData($Input1, $kod)
EndFunc   ;==>odswiez
 

 

Z tego co tu widze..

 

To trzeba powtarzac funkcje .. aha no dobra sproboje :)

 

Like jest ;)

Opublikowano

wytłumacz dokładniej co ci leży na duchu, bo nie dokońca czaje na czym ma to polegać

po kliknięciu w button1, funkcja ma uruchomić się raz? czy ma się wykonywać cały czas do momentu kliknięcia buttona2

czy może coś innego? opisz najdokładniej jak możesz, to otrzymasz to o co ci chodzi

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...